home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / t_os / gpen32k / source.exe / LIB / OSRC / POWI.C < prev    next >
Text File  |  1993-02-26  |  321b  |  14 lines
  1. /************************************************************
  2. *   共通一般ライブラリー                OKOME System 2      *
  3. ************************************************************/
  4.  
  5. #include    <normlib.h>
  6.  
  7. int powi(int x, int n)            /*    整数型 pow    */
  8. {
  9.     int r=1;
  10.     for ( ; n>0; n--)
  11.         r *= x;
  12.     return (r);
  13. }
  14.